﻿#If NETFX_CORE Then

#If FEATURE_OWN_MONO_GAME Then

Imports Microsoft.Xna.Framework
Imports Windows.ApplicationModel.Core

Namespace Global.Runa.Common.MetroGame

    Public Class GameFrameworkViewSource(Of T As Game)
        Implements IFrameworkViewSource

        Public Property Game() As Game

        Public Sub New(ByVal g As Game)
            Me.Game = g
        End Sub

        Public Function CreateView() As Windows.ApplicationModel.Core.IFrameworkView Implements IFrameworkViewSource.CreateView
            Return New MetroFrameworkView(Of T)(Me.Game)
        End Function

    End Class

End Namespace

#End If

#End If